home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / main.dxr / 00312.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  2.2 KB  |  95 lines
  1. on exitFrame me
  2.   global firsttime
  3.   homebackroll()
  4.   scrollroll()
  5.   showit(80, 82)
  6.   showit(76, 79)
  7.   showit(70, 71)
  8.   hideit(59, 61)
  9.   sprite(76).visible = 0
  10.   sprite(75).visible = 0
  11.   set the cursor of sprite 8 to 280
  12.   set the cursor of sprite 5 to 280
  13.   rollit(63, 64)
  14.   rollit(78, 85)
  15.   if firsttime = 1 then
  16.     mscroll = sprite(41).member.name
  17.     member(mscroll).scrollTop = 0
  18.     firsttime = 2
  19.   end if
  20.   if rollover(63) then
  21.     sprite(60).visible = 1
  22.     sprite(75).visible = 1
  23.     sprite(76).visible = 0
  24.     sprite(59).visible = 0
  25.     sprite(61).visible = 0
  26.   else
  27.     if rollover(64) then
  28.       sprite(61).visible = 1
  29.       sprite(76).visible = 1
  30.       sprite(75).visible = 0
  31.       hideit(59, 60)
  32.     end if
  33.   end if
  34.   if rollover(78) then
  35.     sprite(86).visible = 1
  36.     hideit(87, 93)
  37.   else
  38.     if rollover(79) then
  39.       sprite(87).visible = 1
  40.       sprite(86).visible = 0
  41.       hideit(88, 93)
  42.     else
  43.       if rollover(80) then
  44.         sprite(88).visible = 1
  45.         hideit(86, 87)
  46.         hideit(89, 93)
  47.       else
  48.         if rollover(81) then
  49.           sprite(89).visible = 1
  50.           hideit(86, 88)
  51.           hideit(90, 93)
  52.         else
  53.           if rollover(82) then
  54.             sprite(90).visible = 1
  55.             hideit(86, 89)
  56.             hideit(91, 93)
  57.           else
  58.             if rollover(83) then
  59.               sprite(91).visible = 1
  60.               hideit(86, 90)
  61.               hideit(92, 93)
  62.             else
  63.               if rollover(84) then
  64.                 sprite(92).visible = 1
  65.                 sprite(93).visible = 0
  66.                 hideit(86, 91)
  67.               else
  68.                 if rollover(85) then
  69.                   sprite(93).visible = 1
  70.                   hideit(86, 92)
  71.                 else
  72.                   hideit(86, 93)
  73.                 end if
  74.               end if
  75.             end if
  76.           end if
  77.         end if
  78.       end if
  79.     end if
  80.   end if
  81.   cursorNum = 0
  82.   mCast = the mouseCast
  83.   if mCast > 0 then
  84.     if member(mCast).type = #field then
  85.       mWord = the mouseWord
  86.       if the textStyle of word mWord of field mCast contains "underline" then
  87.         cursorNum = 280
  88.       end if
  89.     end if
  90.   end if
  91.   cursor(cursorNum)
  92.   dimarrow()
  93.   go(the frame)
  94. end
  95.